home *** CD-ROM | disk | FTP | other *** search
/ תקליטור אוסף נבחרי 95 / Top_95.iso / TOP95 / KIDS / FROGHOP / FROGHOP.EXE / FROGHOP.dxr / 00242_ .ls < prev    next >
Encoding:
Text File  |  1996-11-01  |  656 b   |  29 lines

  1. on mouseUp
  2.   global sond
  3.   set sond to sond + 1
  4.   if sond = 1 then
  5.     set the soundEnabled to 0
  6.     set the castNum of sprite 44 to 253
  7.     updateStage()
  8.     set TTIME to the timer
  9.     repeat while the timer < (TTIME + 90)
  10.     end repeat
  11.     set the castNum of sprite 44 to 242
  12.     writesoundlevel()
  13.     updateStage()
  14.   end if
  15.   if sond >= 2 then
  16.     set the soundEnabled to 1
  17.     puppetSound("click")
  18.     set the castNum of sprite 44 to 252
  19.     updateStage()
  20.     set sond to 0
  21.     set TTIME to the timer
  22.     repeat while the timer < (TTIME + 90)
  23.     end repeat
  24.     set the castNum of sprite 44 to 242
  25.     updateStage()
  26.     writesoundlevel()
  27.   end if
  28. end
  29.